home *** CD-ROM | disk | FTP | other *** search
/ Cream of the Crop 26 / Cream of the Crop 26.iso / os2 / pvm34b3.zip / pvm34b3 / pvm3 / libfpvm / WIN32 / Pvmfsetctx.c < prev    next >
C/C++ Source or Header  |  1997-07-22  |  275b  |  18 lines
  1.  
  2. /* $Id: Pvmfsetctx.c,v 1.1 1997/06/27 16:32:37 pvmsrc Exp $ */
  3.  
  4. #ifdef WIN32
  5. #include "..\..\src\pvmwin.h"
  6. #endif
  7.  
  8. #include "pvm3.h"
  9. #include "pvm_consts.h"
  10.  
  11. void __fortran
  12. PVMFSETCONTEXT (new_ctx, old_ctx)
  13. int *new_ctx, *old_ctx;
  14. {
  15.     *old_ctx = pvm_setcontext(*new_ctx);
  16. }
  17.  
  18.